function [vect]=t3dto3d(vectcam,alf,bet,T)

T;
vect=[cos(bet)*cos(0) (cos(bet)*sin(0)*sin(alf)-sin(bet)*cos(alf)) (cos(bet)*sin(0)*cos(alf)+ sin(bet)*sin(alf)) T(1,1);
       sin(bet)*cos(0) (sin(bet)*sin(0)*sin(alf)+ cos(bet)*cos(alf)) (sin(bet)*sin(0)*cos(alf)- cos(bet)*sin(alf)) T(1,2);
       -sin(0) cos(0)*sin(alf)  cos(0)*cos(alf) T(1,3);
       0 0 0 1]*vectcam';

end